home *** CD-ROM | disk | FTP | other *** search
/ Programmer Power Tools / Programmer Power Tools.iso / microcrn / issue_40.arc / DAIMS.ARC / EKPANEL.CPP < prev    next >
Encoding:
C/C++ Source or Header  |  1988-02-10  |  640 b   |  28 lines
  1. #include "viscosity.h"
  2. #include <math.h>
  3. #include "matrix.hxx"
  4. #include "Cheb_vector.hxx"
  5. #include "vimatrix.hxx"
  6. #include "ekman.hxx"
  7. #include "ekpanel.hxx"
  8.  
  9. /* 
  10. -*++ ekpanel::ekpanel(): constructor
  11. ** 
  12. ** (*++ history: 
  13. **     16 Jan 88    Bruce &    Creation date
  14. ** ++*)
  15. ** 
  16. ** (*++ detailed: 
  17. ** ++*)
  18. */
  19. /* constructor is messy -- leaves stuff lying about */
  20. ekpanel::ekpanel(ekman_layer & ekman)
  21. {
  22.     ekman_panel_handle = 
  23.     ekman_panel_constructor(ekman.dc(), ekman.ac(),
  24.                 ekman.waves(), ekman.xldom(),
  25.                 ekman.xrdom(), ekman.modes()); 
  26. }
  27.  
  28.